home *** CD-ROM | disk | FTP | other *** search
- on confirmInstallDialog iconLi, NameLi, EnabLi, BtnsLi, StatLi, EditLi, attrLi, valuLi, grupLi
- if the platform contains "mac" then
- iconLi = [#mem: member("muiLogo_mac", "Internal")]
- else
- iconLi = [#mem: member("muiLogo_pc", "Internal")]
- end if
- NameLi = [#i1, #d1, #B1, #S1, #V1]
- EnabLi = [#i1: 1, #d1: 1, #B1: 1, #S1: 1, #V1: 1]
- BtnsLi = [#d1: "OK", #B1: "Cancel"]
- if StatLi = VOID then
- StatLi = [#S1: "This program will install the selected software on your computer"]
- end if
- EditLi = [:]
- attrLi = []
- valuLi = [:]
- grupLi = [:]
- return getconfirmInstallDialogDialog(iconLi, NameLi, EnabLi, BtnsLi, StatLi, EditLi, attrLi, valuLi, grupLi)
- end
-
- on getconfirmInstallDialogDialog iconLi, NameLi, EnabLi, BtnsLi, StatLi, EditLi, attrLi, valuLi, grupLi
- winProps = [#type: #normal, #mode: #pixel, #closeBox: 0, #callback: "muiCallbackStandard", #modal: 1]
- titleBar = "Confirm Software Installation"
- inscription = getMUIGUIDlogText(BtnsLi, StatLi, EditLi)
- txtLi = [#titleBar: titleBar, #inscription: inscription]
- if not listp(attrLi) then
- attrLi = [:]
- end if
- if not listp(valuLi) then
- valuLi = [:]
- end if
- ElemLi = [#i, #d, #b, #s, #V]
- xyLi = [#PositionX: #z, #PositionY: #z, #BreiteF: 480, #HoeheF: 90, #xListe: [0, 280, 380, 120, 110], #yListe: [0, 60, 60, 10, 0], #bListe: [getMuiIconSize(iconLi, 1, #x), 91, 91, 350, 3], #hListe: [getMuiIconSize(iconLi, 1, #y), 20, 20, 35, 90], #aListe: [#left, #center, #center, #left, #left], #pListe: [0, 0, 0, #normal, 0]]
- answer = displayMUIDialog(winProps, iconLi, NameLi, EnabLi, ElemLi, xyLi, txtLi, attrLi, valuLi, grupLi)
- return answer
- end
-